From: Eli Zaretskii Date: Sat, 28 Jan 2012 09:52:24 +0000 (+0200) Subject: Fix character display by "C-u C-x =" in presence of display properties. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~1071 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=5206cf68960e3bc95448e81d523499ecfb2710ee;p=emacs.git Fix character display by "C-u C-x =" in presence of display properties. lisp/descr-text.el (describe-char): Show the raw character, not only its display form at POS. Suggested by Kenichi Handa . See http://lists.gnu.org/archive/html/emacs-devel/2012-01/msg00760.html for the reasons. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4930e099d10..90a94bb9c7f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2012-01-28 Eli Zaretskii + + * descr-text.el (describe-char): Show the raw character, not only + its display form at POS. Suggested by Kenichi Handa . + See http://lists.gnu.org/archive/html/emacs-devel/2012-01/msg00760.html + for the reasons. + 2012-01-28 Phil Hagelberg * emacs-lisp/package.el (package-install): Run diff --git a/lisp/descr-text.el b/lisp/descr-text.el index 0ab72d414e0..9aa061be57b 100644 --- a/lisp/descr-text.el +++ b/lisp/descr-text.el @@ -512,7 +512,8 @@ as well as widgets, buttons, overlays, and text properties." (setq item-list `(("character" - ,(format "%s (%d, #o%o, #x%x)" + ,(format "%s (displayed as %s) (codepoint %d, #o%o, #x%x)" + char-description (apply 'propertize char-description (text-properties-at pos)) char char char))